home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1998 October / Macworld (1998-10).dmg / Serious Demos / Morpha / 3DO.DXR / 00131.ls < prev    next >
Encoding:
Text File  |  1998-07-31  |  171 b   |  10 lines
  1. on changesounds3
  2.   global wait, s, sel, drumonly
  3.   redraw()
  4.   set wait to 1
  5.   set s to random(10)
  6.   do("sel" & s + 10 & EMPTY)
  7.   set sel to s + 10
  8.   set drumonly to 0
  9. end
  10.